module sconstants_mod
    use iso_fortran_env,only: real64
    implicit none
    character(len=2), parameter :: linear_static_step='LS'
    character(len=2), parameter :: natural_frequency_step='NF'
    character(len=2), parameter :: steady_dynamic_step='SD'
    character(len=2), parameter :: transient_dynamics_step='TD'
    ! 结果文件的一级标题头
    character(len=*), parameter :: head_info='#write time info:'
    character(len=*), parameter :: head_node_coords='#NodeID,   Node Coordinates(X, Y, Z)'
    character(len=*), parameter :: end_head_node_coords='#End Node Coordinates'
    character(len=*), parameter :: head_elem_conn='#ElemID ,  Element Connectivity'
    character(len=*), parameter :: end_head_elem_conn='#End Element Connectivity'
    character(len=*), parameter :: head_nodal_disp='#NodeIDNode, Displacements( Ux, Uy, Uz)'
    character(len=*), parameter :: end_head_nodal_disp='#End Displacements'
    character(len=*), parameter :: head_nodal_reactions='#NodeID, Node Reactions(Rx, Ry, Rz)'
    character(len=*), parameter :: end_head_nodal_reactions='#End Node Reactions'
    ! 结果文件二级标题头
    character(len=*), parameter :: head_time_p='## Time='

    ! -----------------------------------------------------
    !                    Modal ANALYSIS CONSTANTS
    ! -----------------------------------------------------
    real(real64),parameter      :: penalty_factor   = 1.0e6_real64
    real(real64), parameter     :: pi = 3.1415926535897_real64

contains
end module sconstants_mod